home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Apple II Magazines (DO)
/
Softdisk Magazette Volume 1, No. 05 (1982-01)(Softdisk)(Side B).zip
/
Softdisk Magazette Volume 1, No. 05 (1982-01)(Softdisk)(Side B).do
/
PDL.EVALUATOR.bas
< prev
next >
Wrap
BASIC Source File
|
1996-12-24
|
544b
|
12 lines
1 HOME
2 PRINT " PADDLE AND JOYSTICK EVALUATOR ": PRINT " BY LARRY MILNE "
3 PRINT "THIS PROGRAM WILL GIVE YOU THE VALUES"
4 PRINT "OF BOTH PADDLES OR THE JOYSTICK AND CAN"
5 PRINT "IDENTIFY WHICH BUTTON IS BEING PUSHED "
9 FOR I = 1 TO 6000: NEXT I
10 VTAB 9: PRINT "PADDLE 0 VALUE": PRINT PDL(0)
20 VTAB 12: PRINT "PADDLE 1 VALUE": PRINT PDL(1)
30 VTAB 15: IF PEEK( -16287) >127 THEN PRINT "BUTTON 0 FIRED"
40 VTAB 18: IF PEEK( -16286) >127 THEN PRINT "BUTTON 1 FIRED"
60 HOME
70 GOTO 10